home *** CD-ROM | disk | FTP | other *** search
/ Explore Yellowstone / Explore Yellowstone (1997)(The Learning Company)[PC-Mac].iso / mac / ACTXCLUD.DIR / 00004_Script_fr loop2 < prev    next >
Text File  |  1996-02-28  |  418b  |  21 lines
  1. on exitFrame  
  2.   global WhichChannel, WhichCast
  3.   repeat with x = 8 to 15
  4.     if rollOver(x) then
  5.       put x into WhichChannel
  6.       puppetsprite WhichChannel, true
  7.       put the castNum of sprite WhichChannel into WhichCast
  8.       set the castNum of sprite WhichChannel to (WhichCast + 1)
  9.       updateStage
  10.       go to "Loop3"
  11.       exit repeat
  12.     end if 
  13.   end repeat
  14.   go to the frame
  15. end
  16.  
  17.  
  18.  
  19.  
  20.  
  21.